home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 February / Macworld (1999-02).dmg / Games World / SharewareGames / Xconq 7.2.2 / lib / 1756.g next >
Text File  |  1998-05-22  |  4KB  |  144 lines
  1. (game-module "1756"
  2.   (title "Europe 1756")
  3.   (blurb "Central Europe, the beginning of summer, 1756.  Frederick must strike or die.")
  4.   (base-module "fred")
  5.   (instructions (
  6.    "Each side should attempt to capture as many of the other's fortresses "
  7.    "as possible.  "
  8.    ))
  9. )
  10.  
  11. (include "t-cent-eur")
  12.  
  13. ;;; Modify the defaults in fred.
  14.  
  15. (add u* start-with 0)
  16.  
  17. ;;; All scenarios include these sides, but only three were active in 1756.
  18.  
  19. (side 1 (name "Prussia") (adjective "Prussian") (emblem-name "arms-prussia"))
  20. (side 2 (name "Hannover") (adjective "Hannoverian") (emblem-name "arms-hannover")
  21.   (active false))
  22. (side 3 (name "Austria") (adjective "Austrian") (emblem-name "arms-austria"))
  23. (side 4 (name "Saxony") (adjective "Saxon") (emblem-name "arms-saxony"))
  24. (side 5 (name "France") (adjective "French") (emblem-name "arms-france")
  25.   (active false))
  26. (side 6 (name "Russia") (adjective "Russian") (emblem-name "arms-russia")
  27.   (active false))
  28. (side 7 (name "Sweden") (adjective "Swedish") (emblem-name "arms-sweden")
  29.   (active false))
  30. (side 8 (name "Empire") (adjective "Empire")
  31.   (active false))
  32.  
  33. ;;; Austria and Saxony are allies.
  34.  
  35. (side 3 (trusts (3 1) (4 1)))
  36. (side 4 (trusts (3 1) (4 1)))
  37.  
  38. (set sides-max 8)
  39.  
  40. (town 13 28 0 (n "Bremen"))
  41. (town 18 19 0 (n "Cassel"))
  42. (town 29 16 0 (n "Chemnitz"))
  43. (town 35 35 0 (n "Danzig"))
  44. (town 29 6 0 (n "Donauworth"))
  45. (town 31 12 0 (n "Eger"))
  46. (town 8 30 0 (n "Emden"))
  47. (town 12 32 0 (n "Hamburg"))
  48. (town 27 18 0 (n "Leipzig"))
  49. (town 36 5 0 (n "Passau"))
  50. (town 36 25 0 (n "Posen"))
  51. (town 32 6 0 (n "Regensburg"))
  52. (town 38 29 0 (n "Thorn"))
  53. (town 27 4 0 (n "Ulm"))
  54. (town 24 11 0 (n "Wurzburg"))
  55.  
  56. (fortress 25 26 0 (n "Berlin"))
  57. (fortress 15 14 0 (n "Coblenz"))
  58. (fortress 29 34 0 (n "Colberg"))
  59. (fortress 12 17 0 (n "Cologne"))
  60. (fortress 11 19 0 (n "Dusseldorf"))
  61. (fortress 20 13 0 (n "Frankfort"))
  62. (fortress 17 25 0 (n "Hannover"))
  63. (fortress 38 38 0 (n "Konigsberg"))
  64. (fortress 30 25 0 (n "Kustrin"))
  65. (fortress 18 12 0 (n "Mainz"))
  66. (fortress 15 8 0 (n "Metz"))
  67. (fortress 14 24 0 (n "Minden"))
  68. (fortress 11 23 0 (n "Munster"))
  69. (fortress 28 9 0 (n "Nuremberg"))
  70. (fortress 9 18 0 (n "Roermond"))
  71. (fortress 12 31 0 (n "Stade"))
  72. (fortress 26 30 0 (n "Stettin"))
  73. (fortress 20 34 0 (n "Stralsund"))
  74. (fortress 20 5 0 (n "Strasbourg"))
  75. (fortress 7 20 0 (n "Venlo"))
  76. (fortress 9 22 0 (n "Wesel"))
  77.  
  78. (king 22 23 1 (n "Frederick") (in pa1))
  79. (prince 22 23 1 (n "Ferdinand") (in "Magdeburg"))
  80. (general 22 23 1 (n "Keith") (in "Magdeburg"))
  81. (army 22 23 1 (hp 48) (sym pa1) (in "Magdeburg"))
  82.  
  83. (marshal 40 18 1 (n "Schwerin") (in pa2))
  84. (army 40 18 1 (hp 25) (sym pa2) (in "Breslau"))
  85.  
  86. (marshal 36 18 1 (n "Brunswick") (in pa3))
  87. (general 36 18 1 (n "Maurice"))
  88. (army 36 18 1 (hp 15) (sym pa3))
  89. (depot 36 18 1)
  90.  
  91. (army 42 17 1 (hp 1) (in "Brieg"))
  92. (army 43 15 1 (hp 1) (in "Neisse"))
  93. (army 40 16 1 (hp 1) (in "Glatz"))
  94. (army 39 17 1 (hp 1) (in "Schweidinitz"))
  95. (army 36 21 1 (hp 1) (in "Glogau"))
  96.  
  97. (fortress 40 18 1 (n "Breslau"))
  98. (fortress 42 17 1 (n "Brieg"))
  99. (fortress 40 16 1 (n "Glatz"))
  100. (fortress 36 21 1 (n "Glogau"))
  101. (fortress 22 23 1 (n "Magdeburg"))
  102. (fortress 43 15 1 (n "Neisse"))
  103. (fortress 39 17 1 (n "Schweidinitz"))
  104.  
  105. (marshal 46 9 3 (n "Browne") (in aa1))
  106. (general 46 9 3 (n "Lascy"))
  107. (army 46 9 3 (hp 50) (sym aa1) (in "Olmutz"))
  108.  
  109. (marshal 39 12 3 (n "Picolomini") (in aa2))
  110. (general 39 12 3 (n "Nadasy"))
  111. (army 39 12 3 (hp 25) (sym aa2))
  112.  
  113. (marshal 35 12 3 (n "Serbeloni") (in aa3))
  114. (army 35 12 3 (hp 10) (sym aa3) (in "Prague"))
  115.  
  116. (fortress 44 7 3 (n "Brunn"))
  117. (fortress 40 13 3 (n "Koniggratz"))
  118. (fortress 46 9 3 (n "Olmutz"))
  119. (fortress 35 12 3 (n "Prague"))
  120. (fortress 46 3 3 (n "Vienna"))
  121.  
  122. (king 31 17 4 (n "Rutkowski") (in sa1))
  123. (army 31 17 4 (hp 20) (sym sa1) (in "Dresden"))
  124.  
  125. (army 28 19 4 (hp 1) (in "Torgau"))
  126.  
  127. (fortress 31 17 4 (n "Dresden"))
  128. (fortress 28 19 4 (n "Torgau"))
  129.  
  130. (scorekeeper
  131.   (title "VP")
  132.   (initial 0)
  133.   (do (set (sum point-value)))
  134.   )
  135.  
  136. (set initial-date "24 Jun 1756")
  137.  
  138. (set initial-year-part 13)
  139.  
  140. ;;; Game only lasts until the end of the year (armies would
  141. ;;; invariably go into winter quarters from December thru March).
  142.  
  143. (set last-turn 13)
  144.